Top 10k strings from Disc Organiser v1e (1989)(Betterbytes Software).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
8
4 )+("SINGLE"
3 LET THE TAPE RUN
2 Y$=K$+"?":
2 Y$="CONTINUE?":
2 T$=T$+" ":
2 T H E O R G A N I S E R ",,"
2 R$="ORGCODE":
2 @D,T,S,O1:
2 ;""+("DOUBLE"
2 ...........
2 )+" TRACK ";
2 )+" DENSITY";
2 OUT OF RANGE
2 "+("EIGHTY"
2 "+("DOUBLE"
2
1 y$="MORE ?":
1 u;" PROG TO
1 q;" DISC FORMAT."
1 o$="RENAME":
1 o$="LOAD ":
1 dT0;""+P$(
1 dD""+("+SYS*"
1 d*"orgc*":
1 d*"ORGCODE"
1 char+" DUM "+
1 Y$=K$+" THIS ?":
1 Y$="THIS OK?":
1 Y$="STAGE"+
1 Y$="RECOVER?":
1 Y$="OK ?":
1 Y$="MORE?":
1 Y$="ERASE NOW":
1 Y$="CONTINUE":
1 Y$="CONFIRM OK":
1 Y$="ALTER ?":
1 WHICH No ?";
1 WHAT IS THE
1 W;"ERASED CODE MAY HAVE BEEN OVER- WRITTEN,& IMPOSSIBLE TO RECOVER.":
1 W;" IF PROGS HAVE BEEN SAVED ON A DISC AFTER FILES HAVE BEEN ERASED, THEN THE";#0
1 W;" DRIVE=";D;"":
1 W;" ANY KEY FOR MENU":
1 W;" (Highest No.=";(
1 U;" RESAVE THE CUSTOMISED CODE ON TO DISC VIA MAINTENANCE OPTION",:
1 U;" M=MENU "
1 The Disc Organiser (v1e)
1 TO MOVE ?
1 TO LOCATE PROG"+("S"
1 THE ";H$;"
1 SECTOR ERROR
1 SCROLL PROMPT
1 S$="PLUS D"
1 S$="DISCIPLE":
1 REFER TO MANUAL
1 RE-ORGANISE THE",;
1 R$="ORGCODE"
1 R$="AUTO-ORG":
1 Q;"No OF DRIVES=";
1 PROGRAM NUMBER
1 PROGRAM NAME
1 ORGCODE
1 ORGANISER
1 ORG
1 O$="ERASE ":
1 O$="COPY ":
1 O$=""+("ERASE"
1 NUMBER ?
1 NOW SAVING
1 NAME TO SAVE
1 MOVE PROG
1 MANY=MANY-1
1 M$="THIS OK?":
1 M$="NOW SAVING":
1 M$=""+(("PAPER="+Z$)
1 M$=" ERASING ":
1 M$(M)=" ":
1 M$(G)=M$(G+0
1 L,L;"DISC MANAGER USERS SHOULD UPDATE& RE-CAT ALTERED DISCS
1 K$="RENAME":
1 K$="RENAME"
1 K$="ERASE":
1 K$="ERASE ":
1 K$="COPY "
1 IS ON WHICH
1 IF NO ERROR REPORT THEN DISC OK."
1 HI-LITE VIA THE
1 H$="ORGANISER":
1 G$="MAIN MENU":
1 For Tony Barnett
1 FILENUMBER TO
1 FAULTY SECTOR
1 ENTER TO SELECT
1 E+" FAULTY SECTORS FOUND.
1 E)+("COPY "
1 DMAKE v
1 DESELECTED":
1 DEFINE DRIVES TO COPY FROM & TO ":
1 DD"AUTO1":
1 D*"ORGCODE"
1 D*"AUTO-ORG"
1 D$=("VERSION"
1 D$="ALTER DRIVE "+
1 CURRENT SET-UP
1 CONTROLS":
1 CHAR=CHAR+1
1 CHANGE NAME
1 BetterBytes Software
1 BETTERBYTES'89 ":
1 AUTOMATIC TRANSFER TO DISC"
1 @d,t,s,G2:
1 @d,H1,I1,G2:
1 @D,T,S,L1:
1 @D,T,S,K1:
1 @D,T,S,J1:
1 @D,M1,N1,O1
1 @D,M1,N1,L1
1 =END SELECTING
1 ;Y$;" YES"," NO":
1 ;Y$,"YES","NO","MENU":
1 ;M$," YES"," NO":
1 ;K$;" PROGRAMS",
1 ;G$,"CATALOGUE","LOAD PROGRAM",H$,"RENAME FILES","ERASE FILES","COPY FILES","RECOVER FILES","MAINTENANCE","SECTOR CHECK","SECTOR REPAIR","LPRINT CAT.","QUIT","VIEW SCREEN",D$:
1 ;,,,,;"
1 ;"You can 'Page' the Catalogue listing by pressing SPACE or N on the scroll prompt."
1 ;"WILDCARDS?"," YES"," NO"," MENU":
1 ;"WHICH FILE";
1 ;"Use the Cursor Keys to move the hilight up and down the MENU OPTIONS. ENTER selects the hilighted option."
1 ;"TYPE IS";
1 ;"TRACKS ?","80 TRACK","40 TRACK","STOP":
1 ;"THIS OK?"," YES"," NO"," MENU"
1 ;"STOP NOW?","YES","NO":
1 ;"SIDES ?","DOUBLE","SINGLE","STOP":
1 ;"SAVE WHICH?","ORGANISER","CUSTOMISED CODE",G$:
1 ;"REPAIR ?"," YES"," NO"," QUIT":
1 ;"PLEASE WAIT",
1 ;"MULTIPLES?"," YES"," NO"," MENU":
1 ;"MAINTENANCE",G$,"SAVE "+H$,"SAVE SYSTEM","CHANGE COLOURS",j$+" MENU 1","CUSTOMISE":
1 ;"LOAD FROM ?","CURRENT DISC","TAPE/CASSETTE","LOAD MANAGER",G$,"CATALOGUE","QUIT PROGRAM":
1 ;"FILE TYPE ?","BASIC","D.ARRAY","$.ARRAY","CODE","48k SNAPSHOT","M.DRIVE FILE","SCREEN$","SPECIAL FILE","128k SNAPSHOT","OPEN# TYPE","EXECUTE","DONT KNOW":
1 ;"Ensure you customise correctly for your set-up. Otherwise discs can become corrupted on some routines.
1 ;"ERASE NOW"," YES"," NO":
1 ;"END SELECTING
1 ;"DRIVES ?","ONE DRIVE","TWO DRIVES","STOP":
1 ;"DENSITY ?","DOUBLE","SINGLE","STOP":
1 ;"CUSTOMISED FOR",;
1 ;"COPY TO "," DRIVE 1"," DRIVE 2":
1 ;"COPY FROM"," DRIVE 1"," DRIVE 2":
1 ;"CHANGE WHICH?"," PAPER"," INK"," MENUS"," FINISHED":
1 ;"CHANGE NAME"," NO"," YES":
1 ;""+(" "
1 ;" WITH THE ";
1 ;" WITH FILENAME ";
1 ;" TYPE FILENAME ";
1 ;" TO QUIT";
1 ;" THE TYPE OF ";
1 ;" THE ";H$;" ";
1 ;" SYSTEM RESETS ";
1 ;" SWAP THE POSITION",;
1 ;" REPAIR";
1 ;" PROGS CAN BE SAVED",;
1 ;" PROGRAM",;
1 ;" POSITIONS OF FILES",;
1 ;" OR CLOSE UP GAPS",;
1 ;" OF PROGRAMS, MAKE",;
1 ;" MORE WORK ";
1 ;" MAKE WHICH
1 ;" IN THE DIRECTORY.",;
1 ;" GIVEN BEFORE ";
1 ;" GAPS INTO WHICH",;
1 ;" FILE MUST BE ";
1 ;" DIRECTORY. ";
1 ;" CURRENT ?"," DRIVE 1"," DRIVE 2"," DISABLE":
1 ;" COPYING ";
1 ;" BE RESTORED. ":
1 ;" AFTER ERASING.",;
1 ;" A FILE CAN ";
1 ;" ?=ANY LETTER ";
1 ;" *=IGNORE REST ";
1 ;" ";M0;" ALTER"+("S"
1 ;" ";H$;" ";
1 ;" YOU REQUIRE ";
1 ;" OTHERWISE ";
1 ;" NOW CHECKING "
1 ;" AFTER COPY. ":
1 ;" "+M$,"TOGGLE COLOUR","COLOUR OK"," NEXT"," STOP":
1 ;" PRESS ANY KEY TO CONTINUE.",:
1 ;" OF NAME. ";
1 ;" TO SAVE ";
1 ;" ":
1 *i1)/(N+f2)):
1 *_\#^#V#F##"_\*e\
1 )="P")+("UPGRADE OLD "+S$+" DOS3A"
1 )="E")+(M$(M,0
1 );" TO ";M$(M,0
1 );" ?
1 )+("MENUS="+W$
1 )+("FOURTY"
1 )+("FORTY"
1 )+(" INK ="+X$
1 )+" SIDED";
1 )+" SIDED ";
1 )+" REQUIRED",;
1 ))+("ALTER DRIVE "
1 (no+many)-1
1 ((W0)-(T*0
1 'TZXed by Andrew Barker
1 '" Use the Organiser on these dummy files which are now being created. Try out all the options available and experiment to become familiar with the Organiser."''" Please read the notes on the Cassette insert. Especially those regarding the use of the SECTOR REPAIR facility."''" After saving the dummy files the Organiser will load and will automatically go into CUSTOMISATION Mode."
1 "What is the NUMBER of the LAST Program on this disc ? ";no :
1 "WIPE CLS"
1 "ORGANISER"
1 "ORG>TAPE"
1 "AUTO-ORG"
1 ",,," "+("
1 to load program which prepares discs with dummy files for testing and experimentation."
1 time, and it cannot recover
1 the progam part held on the
1 that were previously 'locked-
1 repair faulty sectors. It is
1 of the sector error.
1 in' and inaccessable because
1 faulty sector.It may however
1 enable access to programs
1 YOU MAY HAVE TRANSFERRED A CONFIGURED SYSTEM":
1 Version 1e Concept
1 VIEW SCREEN
1 VERSION 1e
1 This routine will attempt to
1 TYPE THE NEW NAME OF PROGRAM ":
1 TRYING TO REPAIR FAULTY SECTOR
1 TRANSFER COMPLETE
1 TRACK/SECTOR No.
1 TRACK ";T;" SECTOR ";S,:
1 TOO MUCH DAMAGE
1 TO TRANSFER THE
1 THIS OPTION CHECKS THE DISC IN DRIVE ";D;" FOR FAULTY SECTORS. ",:
1 THE ";H$;"
1 TESTING FOR SUCESSFUL REPAIR.
1 SUCESSFUL!
1 SELECT OPTION REQUIRED
1 SECTOR REPAIR
1 SECTOR ERROR
1 SEARCHING
1 RESAVING YOUR CUSTOMISED CODE. ":
1 REPAIR SEEMS TO BE
1 RECOVER ERASED FILES.
1 RE-ORGANISING
1 PUT CORRECT DISC INTO DRIVE ";d;,"
1 PRESS ENTER
1 ORGANISER IS IN
1 NOW SAVING
1 NOW PRESS ENTER ";,:
1 NOT guaranteed to work every
1 NOT SUCESSFUL
1 NOT ON THIS PAGE
1 NOT FOUND
1 MENU NOW DISABLED.
1 MANAGER USERS
1 MANAGER DISC IS NOT IN DRIVE ";D;"
1 JANUARY 1989 "
1 INPUT "+("NUMBER"
1 INITIALISED & A
1 IN ONE DRIVE MODE ":
1 GDOS SYSTEM IS
1 FROM TAPE",:
1 FROM DRIVE ]
1 FOUND ERASED
1 FOR FILE No. ";T$;,
1 FILE NAMED
1 FILE NAME ALREADY USED
1 ERASING
1 ENSURE THAT THE
1 E R A S E D
1 Dave Hood
1 DUMMY FILES.":
1 DRIVE ONE.
1 DISC ONTO WHICH
1 DISC CHECKED
1 CURRENT DRIVE NUMBER
1 CHECK FINISHED "+
1 CHANGE NAME OF PROGRAM TO COPY?
1 CAPS "+("ON "
1 CANT REPAIR !
1 CANT ENABLE
1 BETTERBYTES SOFTWARE 1989. ";#1
1 BETTERBYTES SOFTWARE '89"
1 ANOTHER SECTOR ?
1 ";s$;" SYSTEM",:
1 ";many;"
1 ";Z1;" FOUND","
1 ";M0;" RECOVERED ","
1 ";K$;" THIS ?","
1 ";K$;" OPTION
1 "," ";
1 "+G$+" MODE
1 THE CHECK TAKES SOME TIME !
1 SYSTEM ON THIS DISC...
1 EXCHANGED
1 Do you want to try to REPAIR this sector ?",:
1 CURSOR KEYS.
1 AUTO-ORG
1 WILDCARDS
1 TRY AGAIN
1 TO DRIVE ]
1 CHECKING FOR ERASED FILES.
1 ANY KEY
1 PRESS ANY KEY TO CONTINUE "
1 NOTE
1 NOW STOP THE TAPE
1 ";
1
1
1